#include <string.h>
#include <stdlib.h>
#include "ser_as608.h"
#include "time.h"
#include "usart.h"
#include "beep.h"
#include "at24cxx.h"

extern u32 AS608Addr;//模块地址
static u8 fingerprint_Module_Online = 0;
SysPara AS608Para;//指纹模块AS608参数
u16 ValidN;//模块内有效指纹个数
u16 ID = 0;
u16 ID_flag[ID_AGGREGATE] = {0};// 一个位代表一个ID
u8 ID_bit;//ID_flag数组某字节的数据的第几位
u16 ID_index = 0;// ID_flag数组下标


//显示确认码错误信息
void ShowErrMessage(u8 ensure)
{
	printf("%s\r\n", (u8*)EnsureMessage(ensure));
}
void ID_Existing_print(void);
//录指纹
void Add_FR(void)
{
	u8 i,ensure ,processnum=0;
	SearchResult seach;
	while(1)
	{
		switch (processnum)
		{
			case 0:
				i++;
				printf("请按指纹\r\n");
				ensure=PS_GetImage();
				if(ensure==0x00) 
				{
					
					ensure=PS_GenChar(CharBuffer1);//生成特征
					if(ensure==0x00)
					{
						ensure = PS_HighSpeedSearch(CharBuffer1,0,AS608Para.PS_max,&seach);
						if(ensure == 0x00)
						{
							printf("该指纹已存在，ID：%d\n",seach.pageID);
							printf("退出指纹录入\n");
							return;
						}
						printf("指纹正常\r\n");
						i=0;//指纹正常
						processnum=1;//跳到第二步						
					}
					else 
						ShowErrMessage(ensure);
				}
				else 
					ShowErrMessage(ensure);				
				break;
			
			case 1:
				i++;
				printf("请再按一次指纹\r\n");
				ensure=PS_GetImage();
				if(ensure==0x00) 
				{
					ensure=PS_GenChar(CharBuffer2);//生成特征
					if(ensure==0x00)
					{
						i=0;//指纹正常
						printf("指纹正常\r\n");
						processnum=2;//跳到第三步
					}
					else 
						ShowErrMessage(ensure);	
				}
				else 
					ShowErrMessage(ensure);					
				break;

			case 2:
				printf("对比两次指纹\r\n");
				ensure=PS_Match();//对比两次指纹
				if(ensure==0x00) //对比成功,两次指纹一样
				{
					printf("对比成功,两次指纹一样\r\n");
					processnum=3;//跳到第四步
				}
				else 
				{
					printf("对比失败，请重新录入指纹\r\n");
					ShowErrMessage(ensure);
					i=0;//对比失败，请重新录入指纹
					processnum=0;//跳回第一步		
				}
				myDelayMs(1200);
				break;

			case 3:
				printf("生成指纹模板\r\n");
				ensure=PS_RegModel();//生成指纹模板
				if(ensure==0x00) //生成指纹模板成功
				{
					printf("生成指纹模板成功\r\n");
					printf("请输入指纹ID:1~299\r\n");
					ID_Existing_print();
					processnum=4;//跳到第五步
				}
				else
				{
					processnum=0;
					ShowErrMessage(ensure);
				}
				myDelayMs(1200);
				break;
				
			case 4:	
				while(!ID);// 通过串口1输入ID( 后期通过键盘获取ID值)
				ID_bit = ID & 7;
				ID_index = (char)(ID >> 3);
				if(ID == 0xABB9)
				{
					ID = 0;
					printf("退出录指纹 \r\n");
				}
				if(ID >= AS608Para.PS_max)
				{
					ID = 0;
					printf("输入ID必须小于模块容量最大的数值299\r\n");
					processnum=4;//跳到第五步
					break;
				}
				
				if(ID_flag[ID_index] & (0x01 << ID_bit))
				{
					printf("ID = %d 已存在\r\n", ID);
					ID = 0;
					printf("请重新输入指纹ID\r\n");
					processnum=4;//跳到第五步
					break;
				}
				ensure=PS_StoreChar(CharBuffer2,ID);//储存模板
				ID = 0;
				if(ensure==0x00) 
				{			
					printf("录入指纹成功\r\n");
					PS_ValidTempleteNum(&ValidN);//读库指纹个数
					printf("剩余指纹容量: %d\r\n", AS608Para.PS_max-ValidN);
					myDelayMs(1500);
					ID_flag[ID_index] |= (0x01 << ID_bit);
					at24cxxWdata(ID_ADD_BASE + ID_index, ID_flag[ID_index]);// 增加ID信息存入at24c02
					return ;
				}
				else 
				{
					processnum=0;
					ShowErrMessage(ensure);
				}					
				break;							
		}
		myDelayMs(400);
		
		if(i==5)//超过5次没有按手指则退出
		{
			printf("超过5次没有识别到手指，退出录指纹\r\n");
			break;	
		}				
	}
}

//刷指纹
void press_FR(void)
{
	SearchResult seach;
	u8 ensure;
	
	if(!fingerprint_Module_Online)
	{
		printf("未检测到指纹模块，不能刷指纹\r\n");
		return;
	}
	ensure=PS_GetImage();
	if(ensure==0x00)//获取图像成功 
	{	
			
		ensure=PS_GenChar(CharBuffer1);
		if(ensure==0x00) //生成特征成功
		{		
			ensure=PS_HighSpeedSearch(CharBuffer1,0,AS608Para.PS_max,&seach);
			
			if(ensure==0x00)//搜索成功
			{		
				beepOpen();//开启蜂鸣器	
				TIM_SetCompare1(TIM4,500);
				myDelayMs(50);
				beepClose();//关闭蜂鸣器	//TIM4舵机PWM
				myDelayMs(4000);				
				TIM_SetCompare1(TIM4,1500); 
				TIM_SetCompare1(TIM4,500); 
				printf("刷指纹成功\r\n");
				printf("确有此人,ID:%d  匹配得分:%d\r\n",seach.pageID,seach.mathscore);
			
			}
			else 
				ShowErrMessage(ensure);			
		}
		else 
			ShowErrMessage(ensure);
	}
		
}

//删除指纹
void Del_FR(void)
{
	u8  ensure;
	u8 i;
	if(!fingerprint_Module_Online)
	{
		printf("未检测到指纹模块，不能删除指纹\r\n");
		return;
	}
	printf("请输入要删除指纹ID\r\n");
	ID_Existing_print();
	myDelayMs(50);
	while(!ID);// 通过串口1输入ID( 后期通过键盘获取ID值)
	ID_bit = ID & 7;
	ID_index = ID >> 3;
	if(ID==0xABBB)
	{
		ID = 0;
		printf("退出删除指纹 \r\n");
		goto MENU ; //返回主页面
	}
	else if(ID == 0xABBA)
	{
		ID = 0;
		ensure=PS_Empty();//清空指纹库
		if (ensure == 0)
		{
			memset(ID_flag, 0, sizeof(ID_flag));
			for(i = 0; i < ID_AGGREGATE; i++)
			{
				at24cxxWdata(ID_ADD_BASE + i, ID_flag[i]);// 删除ID信息存入at24c02
				myDelayMs(20);
			}
			printf("清空指纹库\r\n");
		}
		else 
			ShowErrMessage(ensure);
	}
	else
	{
		if(ID >= AS608Para.PS_max)
		{
			printf("输入ID必须小于模块容量最大的数值299\r\n");
			printf("退出删除指纹\r\n");
			return;
		}
		
		if(!(ID_flag[ID_index] & (0x01 << ID_bit)))
		{
			printf("ID = %d 不存在\r\n", ID);
			printf("退出删除指纹\r\n");
			return;
		}
		ensure=PS_DeletChar(ID,1);//删除单个指纹
		ID = 0;	
		if(ensure==0)
		{
			ID_flag[ID_index] &= ~(0x01 << ID_bit);
			at24cxxWdata(ID_ADD_BASE + ID_index, ID_flag[ID_index]);// 删除ID信息存入at24c02
			printf("删除指纹成功\r\n");		
		}
		else
			ShowErrMessage(ensure);	
		myDelayMs(1200);
		PS_ValidTempleteNum(&ValidN);//读库指纹个数
		printf("剩余指纹容量: %d\r\n", AS608Para.PS_max-ValidN);
	}
	
MENU:	
	myDelayMs(50);
}

void ID_Existing_print(void)
{
	u8 i , j;
	for(i = 0; i < ID_AGGREGATE; i++)
	{
		for(j = 0; j < 8; j++)
		{
			if(ID_flag[i] & (0x01 << j))
				printf("ID: %d 已存在\r\n", i*8+j);
		}
	}
}


//初始化
void as608_init(void)
{
	u8 ensure;
	char i = 0;
	/*加载指纹识别*/
	printf("hello....\r\n");
	printf("与AS608模块握手....\r\n");
	while(PS_HandShake(&AS608Addr))//与AS608模块握手
	{
		myDelayMs(400);
		printf("未检测到模块!!!\r\n");
		myDelayMs(800);
		printf("尝试连接模块...\r\n");	
		if(++i == 5)
		{
			ShowErrMessage(0x21);
			fingerprint_Module_Online = 0;//未检测到模块
		}
	}
	fingerprint_Module_Online = 1;// 指纹模块在线
	printf("通讯成功!!!\r\n");

	ensure=PS_ValidTempleteNum(&ValidN);//读库指纹个数
	if(ensure!=0x00)
		ShowErrMessage(ensure);//显示确认码错误信息	
	ensure=PS_ReadSysPara(&AS608Para);  //读参数 
	if(ensure==0x00)
	{
		printf("\r\nlibrary capacity:%d\tcomparison grade:%d\r\n", AS608Para.PS_max-ValidN,AS608Para.PS_level);//库容量    对比等级
	}
	else
		ShowErrMessage(ensure);	

	for(i = 0; i < ID_AGGREGATE; i++)
	{
		ID_flag[i] = at24cxxRdata(ID_ADD_BASE + i);
		myDelayMs(20);
	}
}

